home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 2000 January / Macworld (2000-01).dmg / Shareware World / Utilities / Text processing / PDF–Blit™1.02.sea / PDF–Blit™1.02 / Source / DialogUtilities.c next >
C/C++ Source or Header  |  1999-09-15  |  1KB  |  77 lines
  1. #include <DialogUtilities.h>
  2.  
  3.  
  4. pascal void GetIRect(DialogPtr d, short item, Rect *r)
  5. {
  6.     Handle h;
  7.     short iType;
  8.     
  9.     GetDialogItem(d, item, &iType, &h, r);
  10. }
  11.  
  12. pascal Handle GetIHandle(DialogPtr d, short item)
  13. {
  14.     Rect r;
  15.     Handle h;
  16.     short iType;
  17.     
  18.     GetDialogItem(d, item, &iType, &h, &r);
  19.     return h;
  20. }
  21.  
  22. pascal void SetStrItem(DialogPtr d, short item, unsigned char s[])
  23. {
  24.     Handle h = GetIHandle(d, item);
  25.     SetDialogItemText(h, s);
  26. }
  27.  
  28. pascal void ReadStrItem(DialogPtr d, short item, unsigned char s[])
  29. {
  30.     Handle h = GetIHandle(d, item);
  31.     GetDialogItemText(h, s);
  32. }
  33.  
  34. pascal void SetDlgCtl(DialogPtr d, short item, Boolean flag)
  35. {
  36.     ControlHandle c = (ControlHandle)GetIHandle(d, item);
  37.     
  38.     SetControlValue(c, flag);
  39. }
  40.  
  41. pascal Boolean GetDlgCtl(DialogPtr d, short item)
  42. {
  43.     ControlHandle c = (ControlHandle)GetIHandle(d, item);
  44.     
  45.     return GetControlValue(c);
  46. }
  47.  
  48. pascal Boolean TestDlgCtl(DialogPtr d, short item)
  49. {
  50.     ControlHandle c = (ControlHandle)GetIHandle(d, item);
  51.     
  52.     return ((**c).contrlHilite != 0xFF);
  53. }
  54.  
  55. pascal void XAbleDlgCtl(DialogPtr d, short item, Boolean flag)
  56. {
  57.     short type;
  58.     Handle handle;
  59.     Rect rect;
  60.     
  61.     GetDialogItem(d, item, &type, &handle, &rect);
  62.     
  63.     HiliteControl((ControlHandle)handle, flag ? 0 : 0xFF);
  64.     
  65.     InvalRect(&rect);
  66. }
  67.  
  68. pascal void SetupUserItem(DialogPtr d, short item, pascal void (*ItemProc)(DialogPtr d, short item))
  69. {
  70.     short type;
  71.     Handle handle;
  72.     Rect rect;
  73.     
  74.     GetDialogItem(d, item, &type, &handle, &rect);
  75.     SetDialogItem(d, item, type, (Handle)ItemProc, &rect);
  76. }
  77.